(eval `(ns ~(gensym "Critter__")))

(def file-name (str "src\\gen\\SeedCritter.clj"))
(def self-code (read-string (str \( (slurp file-name) \) )))

;
; define functions that may be used by the critter, but not mutated.
;

;(defn print-formatted-code
  ;[code]
  ;(letfn
    ;(helper
      ;[code tab-level]
      ;(if
      
;(defn turn
  ;[dir])

; run the critter
(load-file file-name)